Top 10k strings from Composer (19xx)(-).tap
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TAP] (TOSEC-v2007-01-01) /
Back to the directory listing
3 n$(i)>"9") 3 (n$(i)<"0" 2 t(num)=len: 2 t(maxnotes+1 2 l$="Semiquaver" 2 "Enter New Note- ";n$ 2 "ENTER FILENAME?";F$: 1 tempo=0.02 1 maxnotes=1500 1 l$="Semi-breve" 1 l$="Quaver" 1 l$="Minim" 1 l$="Crotchet" 1 index=n-87 1 index=n-47 1 i;" Note - ";n;" Oct. - ";o;" Dur. - ";d 1 ct=t(maxnotes+1 1 composer 1 ;"[7]-Load Tune" 1 ;"[6]-Save Tune"'' 1 ;"[5]-Clear Tune"'' 1 ;"[4]-Edit Tune"'' 1 ;"[3]-Replay Tune" 1 ;"[2]-Enter Notes"'' 1 ;"[1]-Play on keyboard" 1 ;"Notes in store" 1 ;"Note length =" 1 ;"MAIN MENU"; 1 ;"Enter Option-(Q) To Exit"; 1 ;" ";l$;" " 1 )=m(index) 1 ((num-tn)/2 1 'ct;" Notes entered(";maxnotes;"Max.)"'' 1 '"REST is-4"''"Semiquaver=1 Minim =8"'"Quaver =2 SemiBreve =16"'"Crotchet =4 Octave=1 to 7" 1 '"Duration MUST be 2 digits"'"e.g.3304-D 1 '"Any Key to Return "; 1 '"Any Key to Continue "; 1 #,3rd Oct.Crotchet"'"e.g.6408-F#,4th Oct.Minim" 1 "[E]XTEND LAST TUNE OR [S]TART NEW TUNE?";i$ 1 "Tune Replay" 1 "Tune Editor"''''"D-Display all notes"''"E-Edit a note"''''"I-Insert a note"''"X-Delete a note"''''"R-Return to Main Menu" 1 "Re-entering Note ";nn 1 "Please wait.Tune being cleared" 1 "Play Notes on the Keys from "'"<Q>-lowest note to"'"<M>-highest note"'"Two and a half Octaves are"'"available,middle C being key I"''' 1 "Enter number of note to be"'"deleted."''"(Enter 0 to Exit)"' 1 "Enter Tempo - (1-15) "; 1 "Enter Option-"; 1 "Enter Number of Note- ";nn 1 "Enter Number of Note BEFORE "'"new note to be inserted."'"(Enter 0 to exit)" 1 "Enter Notes-<RET> to end";n$ 1 "Enter Note as <Number>,<Octaves>,<Duration>."'' 1 "C-0 E-4 G#-8"'"C#-1 F-5 A-9"'"D-2 F#-6 A#-10"'"D#-3 G-7 B-11"